Top 10k strings from Calculo de Vigas (1983)(Belltons Informatica)(es).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
3 "--------------------------------" 2 V,K;"--------------------------------": 2 ;"Armadura Superior=";US1;" T." 2 ;"================================": 2 ;" ": 2 "Cortante para Armaduras= ";VSU;" T.": 2 "================================": 2 "--CENTRO DEL VANO": 1 `````88``````````````````````````````888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 W(Z,Q)=NTV+C 1 V,YZ;"Qd = (i=Igual)": 1 V,K;"VIGA - ";Q: 1 V,K;"Qiz= *.00 T. "; 1 V,K;"PLANTA-";Z: 1 V,K;"PLANTA-";Q;"-.-.-.-.-.-.-.-.-.-" 1 V,K;"NUMERO DE VIGAS = "; 1 V,K;"NUMERO DE PILARES = "; 1 V,K;"Momento en el Centro = *.00 mT"; 1 V,K;"Miz= *.00 mT "; 1 V,K;"H= cm B= * cm L= *.00 m." 1 V,K;"----- --- ---": 1 UC=FCD/1.5 1 SALIR DEL PROGRAMA " 1 PASA A CALCULO 1 KK=T*(B(Q)-S*REC)/(S*NO-C) 1 K,K;"RELACION DE VIGAS Y PILARES ================================" 1 K,K;"DIMENSIONES Y CARGAS DE VIGAS ================================" 1 K,K;" CARACTERISTICAS DEL PORTICO "; 1 J.L.del Rio Moreno 1 G(Z,Q)=NTV+C 1 G(NPL,NP): 1 Calc-Vig H 1 Calc-Vig 1 CARG=CARG+A(O,Q) 1 C,K;"OPCION DE SALIDA DE RESULTADOS:"; 1 C(Z,Q)=CARG 1 ARMADURA DE VIGAS DE HORMIGON-Impresora Centronics- 1 A=D(G(Z,Q))+I(W(Z,Q)) 1 ;NO;" 0-";D1: 1 ;"c-COMPLETOS"; 1 ;"Us1--> ";NO;" 0-";D1: 1 ;"Us1 -->";NO;" 0-";D1: 1 ;"Si no hay viga pulsar 0": 1 ;"Relacion de Vigas y Pilares" 1 ;"PULSAR:": 1 ;"PILAR VIZ VDE": 1 ;"Le = KG/CM2": 1 ;"INDICAR TITULO DEL PORTICO"; 1 ;"Cargas en cada Planta": 1 ;"Cargas Verticales en Pilares": 1 ;"Cargas Totales por Planta": 1 ;"CORRECTO (S/N)" 1 ;"CON QUE DIAMETRO SE QUIERE ARMAR"; 1 ;"Armaduras de Portico "; 1 ;"Armadura Inferior=";US1;" T." 1 ;"Armadura Inferior= ";US1;" T." 1 ;"Arm. Superior= ";AM1;" T.(Minima)" 1 ;"Arm. Inferior= ";AM1;" T.(Minima)" 1 ;"ARMADURAS DE VIGAS DE HORMIGON ================================" 1 ;"-FINAL DE CALCULO DEL PORTICO-"; 1 ;"--------------------------------" 1 ;"-------------------------": 1 ;"---------------------": 1 ;"*********************************"; 1 ;"*********************************" 1 ;"**** Planta-";Z;"--------------": 1 ;"**** PLANTA-";Z;"---------------": 1 ;"** Viga-";Q;" --------------": 1 ;"* PROGRAMA CARGADO *"; 1 ;"(Maximo 1 ;" KG/CM2": 1 ;" "; 1 ;" A R M A D U R A S ": 1 ;" ": 1 ;" "; 1 ;" ": 1 ;" " 1 99)88=(/==/(=8888()9::9)(889999999988()9::9)(8888)99 1 99)889999999988)99 1 99)8888999999998888888888889999999988889999999988 1 889999999988888888888888888888888888888888888``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88``````````````````````````````88````` 1 88888888888888888888888888888888888888888888=(/==/(=888888888888888888888888()9::9)(88888888888888=(/==/(=88)99 1 -J.L.del Rio Moreno-1983" 1 -COMENZAR EL PROGRAMA"; 1 -CALCULAR MAS VIGAS "; 1 ,K;"SE VA A UTILIZAR LA IMPRESORA" 1 ,K;"SE IMPRIMEN CARACTERISTICAS DE LOS MATERIALES "; 1 ,K;"1-SI 2-NO"; 1 ,K;"--------------------------------" 1 ,K;" ": 1 *VCU;" T.": 1 *REC)/(NO-1 1 *MD/(UC*H)) 1 *H(Q)*B(Q)/10 1 *(RCA/1000)/1.15)+.5)" 1 *(H(Q)-REC)/100 1 (UC*(1-ZZS^.5)*100+.5)/100" 1 (M(Q)/2.5*100+.5)/100" 1 (ARMA/(((D1/10)/2)^2* 1 (.45*UC*100+.5)/100" 1 (.04*UC*100+.5)/100" 1 ((M(Q)-(X(Q)-Y(Q))/2)*100+.5)/100" 1 ((.45*UC+US2C)*100+.5)/100" 1 (((MD-(.35*UC*H))/(H-E))*100+.5)/100" 1 (((I(Q)+(X(Q)+Y(Q))/L(Q))*1.6 1 (((D(Q)-(X(Q)+Y(Q))/L(Q))*1.6 1 "cm. ";REC: 1 "Viz= Viga Izquierda": 1 "Viga izquierda ";V1: 1 "Viga derecha ";V3: 1 "Viga de ";HTT;"x";BT;" cm. Luz= ";L;" m." 1 "Vde= Viga Derecha": 1 "Vcu = ";VCU;" T.": 1 "Total de vigas ";NTV: 1 "Resistencia Caracteristica del " 1 "Recubrimiento de las Armaduras" 1 "Ra= ";REC;" cm.": 1 "Qmax = ";5 1 "Q.Izq.= ";Q1;" T. Q.der.= ";Q2;" T." 1 "Pilar-";Q,C(Z,Q);" Toneladas": 1 "Pilar-";Q,A(Z,Q);" Toneladas": 1 "Pilar Viz Vde Pilar Viz Vde" 1 "Numero de Vigas = ";VI 1 "Numero de Vigas ";VI: 1 "Numero de Plantas ";NPL: 1 "Numero de Pilares = ";PI 1 "Numero de Pilares ";PI: 1 "NUMERO DE PLANTAS = ";NPL 1 "Momento izquierdo ";M1 1 "Momento en el centro ";MC 1 "Momento derecho ";M2 1 "Momento Centro Vano= ";MOM;" mT.": 1 "Momento Centro Vano= ";MC;" mT." 1 "Mc= ";MOM;" mT< Mmin.= ";MMIN;" mT": 1 "Mc= ";MOM;" mT.< Mmin = ";MMIN;" mT.": 1 "MOMENTO EN CENTRO del VANO": 1 "M. izq.= ";M1;" mT. M. der.= ";-M2;" mT." 1 "Luz de la Viga ";L: 1 "Limite Elastico del Acero" 1 "Le = ";RCA;" Kg/cm2" 1 "Kg/cm2. ";RCA: 1 "Kg/cm2. ";FCD: 1 "Izq.-->Estribos 0-";DIE;" c/";DIS;" m.": 1 "Hormigon = ";FCD;" Kg/cm2" 1 "Estribos 0-";DIE;" c/";DIS;" m.": 1 "Estribos 0-";DIE;" c/ ";DIS;" m": 1 "Dimensiones y Cargas de Vigas" 1 "Diametro en mm. ";DI: 1 "Der.-->Estribos 0-";DIE;" c/";DIS;" m.": 1 "Cortante izquierdo ";Q1 1 "Cortante derecho ";Q2 1 "Cortante absorbido por Hormigon": 1 "Cortante Maximo Admisible": 1 "Cortante Hiperestatico= ";Q2T;" T.": 1 "Cortante Hiperestatico= ";Q1T;" T.": 1 "Caracteristicas del Portico" 1 "Caracteristicas de las Secciones" 1 "Canto de la Viga ";HTT: 1 "B(Q)/100" 1 "Armaduras de Portico ";C$ 1 "Armadura Superior= ";US2C;" T." 1 "Armadura Superior= ";US1C;" T. " 1 "Armadura Inferior =";US2C;" T." 1 "Armadura Inferior =";US1C;" T." 1 "Arm. Superior= ";AM1;" T.(Minima)" 1 "Arm. Sup. = ";US2C;" T-> ";NO;" 0-";D1 1 "Arm. Sup. = ";US1C;" T->";NO;" 0-";D1 1 "Arm. Inferior= ";AM1;" T.(Minima)" 1 "Arm. Inf. = ";US2C;" T-> ";NO;" 0-";D1 1 "Arm. Inf. = ";US1C;" T-> ";NO;" 0-";D1 1 "Ancho de la Viga ";BT: 1 "9";" ": 1 "9",K;"RECUBRIMIENTO DE ARMADURAS="; 1 "6",K;"*LIMITE ELASTICO DEL ACERO "; 1 "5";" ": 1 "5",K;"NUMERO TOTAL DE VIGAS= "; 1 "3",K;"NUMERO DE PLANTAS= "; 1 "3",K;"*RESISTENCIA CARACTERISTICA DEL HORMIGON="; 1 "25";" .00": 1 "20";Q2;" T. " 1 "2";"r-RESUMIDOS" 1 "19";Q2;" T. " 1 "15";"Mder= *.00 mT"; 1 "15";" "; 1 "10",K;"1- SI 2- NO "; 1 "--CENTRO DEL VANO M= ";MOM;" mT.": 1 "--ARRANQUE IZQUIERDO": 1 "--ARRANQUE DERECHO": 1 "--ARMADURA A CORTANTE": 1 "----- --- --- ----- --- ---" 1 "**** PLANTA-";Z;"-------------" 1 "**** PLANTA-";Q;" - - - - - - - - -" 1 "** VIGA-";Q;" --------------" 1 "** ARRANQUE IZQUIERDO": 1 "** ARRANQUE DERECHO": 1 "(H(Q)-REC)/100" 1 Caracteres)"